home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-03 / qbasicpg.zip / FOR-2.BAS < prev    next >
Encoding:
BASIC Source File  |  1989-08-31  |  137 b   |  10 lines
  1. ' FOR-2.BAS
  2. ' This program demonstrates the FOR loop.
  3.  
  4. CLS
  5.  
  6. FOR i% = 6 TO 5
  7.     PRINT "The current value of i% is"; i%
  8. NEXT i%
  9.  
  10.